COMMENT ā VALID 00006 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 Here's how to make a chart:
C00026 00003
C00037 00004 (do-chart '(d2 d3 sail s3600))
C00047 00005
C00058 00006 (do-chart '(franz68k franz750 NIL750))
C00068 ENDMK
Cā;
;;; Here's how to make a chart:
(load "chart.lsp")(load "data.bch")
(fasload chart fas)
(fasload data fas)
(do-chart '((safe-quotient sail interlisp-10)))
Benchmark | SAIL | InterLisp-10 | 780 Franz | 3600 |
--------------------------------------------------------------|
| | | | |
Boyer | 33.98 | 52.93 | 71.5 | 19.52 |
| | | | |
--------------------------------------------------------------|
| | | | |
Browse | 82.68 | 97.3 | 170.25 | 48.62 |
| | | | |
--------------------------------------------------------------|
| | | | |
Destruct | 8.43 | 10.63 | 13.73 | 5.63 |
| | | | |
--------------------------------------------------------------|
| | | | |
Traverse | | | | |
Initialize | 51.82 | 43.71 | 30.27 | 13.5 |
Traverse | 23.96 | 85.86 | 82.98 | 51.23 |
| | | | |
--------------------------------------------------------------|
| | | | |
Tak | 0.85 | 2.08 | 8.29 | 0.59 |
| | | | |
--------------------------------------------------------------|
| | | | |
STak | 4.42 | 6.37 | 6.32 | 2.47 |
| | | | |
--------------------------------------------------------------|
| | | | |
CTak | 4.18 | 44.67 | 12.05 | 8.84 |
| | | | |
--------------------------------------------------------------|
| | | | |
Takl | 4.03 | 3.78 | 9.72 | 6.32 |
| | | | |
--------------------------------------------------------------|
| | | | |
Takr | 1.18 | 2.16 | 3.62 | 0.59 |
| | | | |
--------------------------------------------------------------|
| | | | |
Deriv | 30.23 | 47.95 | - | 17.5 |
| | | | |
--------------------------------------------------------------|
| | | | |
DDeriv | 38.62 | 37.19 | - | 15.2 |
| | | | |
--------------------------------------------------------------|
| | | | |
Fdderiv | 34.62 | - | - | - |
| | | | |
--------------------------------------------------------------|
| | | | |
Div2 | | | | |
Iterative | 17.25 | 136.88 | 19.97 | 8.8 |
Recursive | 18.08 | 73.16 | 24.65 | 11.19 |
| | | | |
--------------------------------------------------------------|
| | | | |
FFT | 9.38 | 3.6 | - | 4.77 |
| | | | |
--------------------------------------------------------------|
| | | | |
Puzzle | 11.83 | 128.95 | - | 14.21 |
| | | | |
--------------------------------------------------------------|
| | | | |
Triang | 144.9 | 2327.56 | - | 158.1 |
| | | | |
--------------------------------------------------------------|
| | | | |
Fprint | 1.32 | 4.45 | 0.61 | 3.2 |
| | | | |
--------------------------------------------------------------|
| | | | |
Fread | 1.8 | 4.47 | 1.48 | 6.25 |
| | | | |
--------------------------------------------------------------|
| | | | |
Tprint | 6.52 | 4.72 | 0.52 | 7.8 |
| | | | |
--------------------------------------------------------------|
| | | | |
Frpoly | | | | |
Power = 2 | | | | |
r=x+y+z+1 | 0.02 | - | 0.02 | 0.0 |
r2=1000*r | 0.02 | - | 0.02 | 0.01 |
r3=r in flonums | 0.02 | - | 0.03 | 0.0 |
| | | | |
Power = 5 | | | | |
r=x+y+z+1 | 0.02 | - | 0.02 | 0.88 |
r2=1000*r | 1.06 | - | 0.38 | 0.26 |
r3=r in flonums | 0.08 | - | 0.22 | 0.09 |
| | | | |
Power = 10 | | | | |
r=x+y+z+1 | 1.9 | - | 2.33 | 1.01 |
r2=1000*r | 12.48 | - | 10.27 | 5.1 |
r3=r in flonums | 5.89 | - | 2.6 | 1.06 |
| | | | |
Power = 15 | | | | |
r=x+y+z+1 | 12.57 | - | 24.62 | 6.4 |
r2=1000*r | 94.77 | - | 116.88 | 50.3 |
r3=r in flonums | 81.33 | - | 31.85 | 6.8 |
| | | | |
--------------------------------------------------------------|
T
(fasload chart fas)
(fasload data fas)
(do-chart '(sail interlisp-10 s3600 franz780))
Benchmark | SAIL | InterLisp-10 | 3600 | 780 Franz |
--------------------------------------------------------------|
| | | | |
Boyer | 33.98 | 52.93 | 19.52 | 71.5 |
| | | | |
--------------------------------------------------------------|
| | | | |
Browse | 82.68 | 97.3 | 48.62 | 170.25 |
| | | | |
--------------------------------------------------------------|
| | | | |
Destruct | 8.43 | 10.63 | 5.63 | 13.73 |
| | | | |
--------------------------------------------------------------|
| | | | |
Traverse | | | | |
Initialize | 51.82 | 43.71 | 13.5 | 30.27 |
Traverse | 23.96 | 85.86 | 51.23 | 82.98 |
| | | | |
--------------------------------------------------------------|
| | | | |
Tak | 0.85 | 2.08 | 0.59 | 8.29 |
| | | | |
--------------------------------------------------------------|
| | | | |
STak | 4.42 | 6.37 | 2.47 | 6.32 |
| | | | |
--------------------------------------------------------------|
| | | | |
CTak | 4.18 | 44.67 | 8.84 | 12.05 |
| | | | |
--------------------------------------------------------------|
| | | | |
Takl | 4.03 | 3.78 | 6.32 | 9.72 |
| | | | |
--------------------------------------------------------------|
| | | | |
Takr | 1.18 | 2.16 | 0.59 | 3.62 |
| | | | |
--------------------------------------------------------------|
| | | | |
Deriv | 30.23 | 47.95 | 17.5 | - |
| | | | |
--------------------------------------------------------------|
| | | | |
DDeriv | 38.62 | 37.19 | 15.2 | - |
| | | | |
--------------------------------------------------------------|
| | | | |
Fdderiv | 34.62 | - | - | - |
| | | | |
--------------------------------------------------------------|
| | | | |
Div2 | | | | |
Iterative | 17.25 | 136.88 | 8.8 | 19.97 |
Recursive | 18.08 | 73.16 | 11.19 | 24.65 |
| | | | |
--------------------------------------------------------------|
| | | | |
FFT | 9.38 | 3.6 | 4.77 | - |
| | | | |
--------------------------------------------------------------|
| | | | |
Puzzle | 11.83 | 128.95 | 14.21 | - |
| | | | |
--------------------------------------------------------------|
| | | | |
Triang | 144.9 | 2327.56 | 158.1 | - |
| | | | |
--------------------------------------------------------------|
| | | | |
Fprint | 1.32 | 4.45 | 3.2 | 0.61 |
| | | | |
--------------------------------------------------------------|
| | | | |
Fread | 1.8 | 4.47 | 6.25 | 1.48 |
| | | | |
--------------------------------------------------------------|
| | | | |
Tprint | 6.52 | 4.72 | 7.8 | 0.52 |
| | | | |
--------------------------------------------------------------|
| | | | |
Frpoly | | | | |
Power = 2 | | | | |
r=x+y+z+1 | 0.02 | - | 0.0 | 0.02 |
r2=1000*r | 0.02 | - | 0.01 | 0.02 |
r3=r in flonums | 0.02 | - | 0.0 | 0.03 |
| | | | |
Power = 5 | | | | |
r=x+y+z+1 | 0.02 | - | 0.88 | 0.02 |
r2=1000*r | 1.06 | - | 0.26 | 0.38 |
r3=r in flonums | 0.08 | - | 0.09 | 0.22 |
| | | | |
Power = 10 | | | | |
r=x+y+z+1 | 1.9 | - | 1.01 | 2.33 |
r2=1000*r | 12.48 | - | 5.1 | 10.27 |
r3=r in flonums | 5.89 | - | 1.06 | 2.6 |
| | | | |
Power = 15 | | | | |
r=x+y+z+1 | 12.57 | - | 6.4 | 24.62 |
r2=1000*r | 94.77 | - | 50.3 | 116.88 |
r3=r in flonums | 81.33 | - | 6.8 | 31.85 |
| | | | |
--------------------------------------------------------------|
T
(do-chart '(d2 d3 sail s3600))
Benchmark | Dolphin | Dorado | SAIL | 3600 |
------------------------------------------------------|
| | | | |
Boyer | 132.4 | 30.3 | 33.98 | 19.52 |
| | | | |
------------------------------------------------------|
| | | | |
Browse | 331.6 | 94.4 | 82.68 | 48.62 |
| | | | |
------------------------------------------------------|
| | | | |
Destruct | 34.97 | 7.18 | 8.43 | 5.63 |
| | | | |
------------------------------------------------------|
| | | | |
Traverse | | | | |
Initialize | 101.25 | 20.99 | 51.82 | 13.5 |
Traverse | 299.0 | 63.9 | 23.96 | 51.23 |
| | | | |
------------------------------------------------------|
| | | | |
Tak | 3.84 | 0.52 | 0.85 | 0.59 |
| | | | |
------------------------------------------------------|
| | | | |
STak | 12.4 | 1.89 | 4.42 | 2.47 |
| | | | |
------------------------------------------------------|
| | | | |
CTak | 140.0 | 18.0 | 4.18 | 8.84 |
| | | | |
------------------------------------------------------|
| | | | |
Takl | 45.6 | 3.62 | 4.03 | 6.32 |
| | | | |
------------------------------------------------------|
| | | | |
Takr | 3.42 | 0.67 | 1.18 | 0.59 |
| | | | |
------------------------------------------------------|
| | | | |
Deriv | 79.7 | 28.48 | 30.23 | 17.5 |
| | | | |
------------------------------------------------------|
| | | | |
DDeriv | 100.2 | 33.0 | 38.62 | 15.2 |
| | | | |
------------------------------------------------------|
| | | | |
Fdderiv | - | - | 34.62 | - |
| | | | |
------------------------------------------------------|
| | | | |
Div2 | | | | |
Iterative | 36.6 | 11.98 | 17.25 | 8.8 |
Recursive | 39.7 | 12.76 | 18.08 | 11.19 |
| | | | |
------------------------------------------------------|
| | | | |
FFT | 34.9 | 31.08 | 9.38 | 4.77 |
| | | | |
------------------------------------------------------|
| | | | |
Puzzle | 91.0 | 14.0 | 11.83 | 14.21 |
| | | | |
------------------------------------------------------|
| | | | |
Triang | 1510.7 | 252.41 | 144.9 | 158.1 |
| | | | |
------------------------------------------------------|
| | | | |
Fprint | 14.9 | 1.57 | 1.32 | 3.2 |
| | | | |
------------------------------------------------------|
| | | | |
Fread | 6.41 | 1.57 | 1.8 | 6.25 |
| | | | |
------------------------------------------------------|
| | | | |
Tprint | 29.2 | 5.55 | 6.52 | 7.8 |
| | | | |
------------------------------------------------------|
| | | | |
Frpoly | | | | |
Power = 2 | | | | |
r=x+y+z+1 | - | - | 0.02 | 0.0 |
r2=1000*r | - | - | 0.02 | 0.01 |
r3=r in flonums | - | - | 0.02 | 0.0 |
| | | | |
Power = 5 | | | | |
r=x+y+z+1 | - | - | 0.02 | 0.88 |
r2=1000*r | - | - | 1.06 | 0.26 |
r3=r in flonums | - | - | 0.08 | 0.09 |
| | | | |
Power = 10 | | | | |
r=x+y+z+1 | - | - | 1.9 | 1.01 |
r2=1000*r | - | - | 12.48 | 5.1 |
r3=r in flonums | - | - | 5.89 | 1.06 |
| | | | |
Power = 15 | | | | |
r=x+y+z+1 | - | - | 12.57 | 6.4 |
r2=1000*r | - | - | 94.77 | 50.3 |
r3=r in flonums | - | - | 81.33 | 6.8 |
| | | | |
------------------------------------------------------|
T
Benchmark | LM-2 | Dolphin | Dorado | 780 Franz |
-----------------------------------------------------------|
| | | | |
Boyer | 45.0 | 132.4 | 30.3 | 71.5 |
| | | | |
-----------------------------------------------------------|
| | | | |
Browse | 70.21 | 331.6 | 94.4 | 170.25 |
| | | | |
-----------------------------------------------------------|
| | | | |
Destruct | 8.54 | 34.97 | 7.18 | 13.73 |
| | | | |
-----------------------------------------------------------|
| | | | |
Traverse | | | | |
Initialize | 41.23 | 101.25 | 20.99 | 30.27 |
Traverse | 215.68 | 299.0 | 63.9 | 82.98 |
| | | | |
-----------------------------------------------------------|
| | | | |
Tak | 2.9 | 3.84 | 0.52 | 8.29 |
| | | | |
-----------------------------------------------------------|
| | | | |
STak | 7.83 | 12.4 | 1.89 | 6.32 |
| | | | |
-----------------------------------------------------------|
| | | | |
CTak | 10.43 | 140.0 | 18.0 | 12.05 |
| | | | |
-----------------------------------------------------------|
| | | | |
Takl | 25.9 | 45.6 | 3.62 | 9.72 |
| | | | |
-----------------------------------------------------------|
| | | | |
Takr | 2.87 | 3.42 | 0.67 | 3.62 |
| | | | |
-----------------------------------------------------------|
| | | | |
Deriv | 23.9 | 79.7 | 28.48 | - |
| | | | |
-----------------------------------------------------------|
| | | | |
DDeriv | 23.67 | 100.2 | 33.0 | - |
| | | | |
-----------------------------------------------------------|
| | | | |
Fdderiv | - | - | - | - |
| | | | |
-----------------------------------------------------------|
| | | | |
Div2 | | | | |
Iterative | 8.63 | 36.6 | 11.98 | 19.97 |
Recursive | 12.38 | 39.7 | 12.76 | 24.65 |
| | | | |
-----------------------------------------------------------|
| | | | |
FFT | 39.07 | 34.9 | 31.08 | - |
| | | | |
-----------------------------------------------------------|
| | | | |
Puzzle | 42.93 | 91.0 | 14.0 | - |
| | | | |
-----------------------------------------------------------|
| | | | |
Triang | 763.0 | 1510.7 | 252.41 | - |
| | | | |
-----------------------------------------------------------|
| | | | |
Fprint | 12.09 | 14.9 | 1.57 | 0.61 |
| | | | |
-----------------------------------------------------------|
| | | | |
Fread | 20.67 | 6.41 | 1.57 | 1.48 |
| | | | |
-----------------------------------------------------------|
| | | | |
Tprint | 17.67 | 29.2 | 5.55 | 0.52 |
| | | | |
-----------------------------------------------------------|
| | | | |
Frpoly | | | | |
Power = 2 | | | | |
r=x+y+z+1 | 0.02 | - | - | 0.02 |
r2=1000*r | 0.022 | - | - | 0.02 |
r3=r in flonums | 0.022 | - | - | 0.03 |
| | | | |
Power = 5 | | | | |
r=x+y+z+1 | 0.2 | - | - | 0.02 |
r2=1000*r | 0.25 | - | - | 0.38 |
r3=r in flonums | 0.24 | - | - | 0.22 |
| | | | |
Power = 10 | | | | |
r=x+y+z+1 | 2.29 | - | - | 2.33 |
r2=1000*r | 3.52 | - | - | 10.27 |
r3=r in flonums | 2.73 | - | - | 2.6 |
| | | | |
Power = 15 | | | | |
r=x+y+z+1 | 18.55 | - | - | 24.62 |
r2=1000*r | 30.9 | - | - | 116.88 |
r3=r in flonums | 22.43 | - | - | 31.85 |
| | | | |
-----------------------------------------------------------|
T
(do-chart '(franz68k franz750 NIL750))
Benchmark | Franz 68000 | 750 Franz | 750 NIL |
-------------------------------------------------------|
| | | |
Boyer | 139.86 | 111.45 | 83.78 |
| | | |
-------------------------------------------------------|
| | | |
Browse | 413.03 | 261.14 | 1226.54 |
| | | |
-------------------------------------------------------|
| | | |
Destruct | 22.99 | 15.63 | 8.96 |
| | | |
-------------------------------------------------------|
| | | |
Traverse | | | |
Initialize | - | 52.28 | 39.72 |
Traverse | - | 132.62 | 273.32 |
| | | |
-------------------------------------------------------|
| | | |
Tak | - | 14.8 | 4.16 |
| | | |
-------------------------------------------------------|
| | | |
STak | 11.17 | 11.18 | 23.24 |
| | | |
-------------------------------------------------------|
| | | |
CTak | 20.75 | 18.34 | 9.92 |
| | | |
-------------------------------------------------------|
| | | |
Takl | 19.75 | 18.4 | 39.27 |
| | | |
-------------------------------------------------------|
| | | |
Takr | - | 5.08 | 5.71 |
| | | |
-------------------------------------------------------|
| | | |
Deriv | - | - | 24.63 |
| | | |
-------------------------------------------------------|
| | | |
DDeriv | - | - | 29.0 |
| | | |
-------------------------------------------------------|
| | | |
Fdderiv | - | - | 28.29 |
| | | |
-------------------------------------------------------|
| | | |
Div2 | | | |
Iterative | 32.81 | 25.84 | 9.94 |
Recursive | 36.19 | 31.88 | 15.15 |
| | | |
-------------------------------------------------------|
| | | |
FFT | - | - | 38.17 |
| | | |
-------------------------------------------------------|
| | | |
Puzzle | - | - | 498.02 |
| | | |
-------------------------------------------------------|
| | | |
Triang | - | - | 652.35 |
| | | |
-------------------------------------------------------|
| | | |
Fprint | 1.43 | 1.23 | 38.23 |
| | | |
-------------------------------------------------------|
| | | |
Fread | 2.81 | 2.34 | 28.02 |
| | | |
-------------------------------------------------------|
| | | |
Tprint | 1.65 | 0.87 | 58.31 |
| | | |
-------------------------------------------------------|
| | | |
Frpoly | | | |
Power = 2 | | | |
r=x+y+z+1 | - | 0.05 | 0.0 |
r2=1000*r | - | 0.03 | 0.15 |
r3=r in flonums | - | 0.03 | 0.05 |
| | | |
Power = 5 | | | |
r=x+y+z+1 | - | 0.35 | 0.36 |
r2=1000*r | - | 1.75 | 2.15 |
r3=r in flonums | - | 1.69 | 0.43 |
| | | |
Power = 10 | | | |
r=x+y+z+1 | - | 6.75 | 3.88 |
r2=1000*r | - | 20.77 | 38.99 |
r3=r in flonums | - | 10.22 | 4.66 |
| | | |
Power = 15 | | | |
r=x+y+z+1 | - | 46.35 | 25.81 |
r2=1000*r | - | 222.6 | 482.87 |
r3=r in flonums | - | 52.47 | 31.18 |
| | | |
-------------------------------------------------------|
T